home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 57.zip / BS1 part 57 / Pro-net personal v2.0 d1.adf / install_pnp_dh < prev    next >
Text File  |  1989-12-12  |  1KB  |  61 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6. . Usage install_pn_dh  harddisk_name
  7. .key NAME
  8. if <NAME$"NOTHING"> EQ "NOTHING"
  9. ECHO " "
  10. ECHO "Usage:"
  11. ECHO " "
  12. ECHO "EXECUTE PRO-NET_P:INSTALL_PN_DH   hard_disk_name"
  13. ECHO " "
  14. QUIT
  15. endif
  16. version 99.99
  17. if warn
  18.    failat 31
  19.    lab MOUNT1
  20.    mount Rad: FROM PRO-NET_P:MountListForRad
  21.    relabel Rad: MyRad
  22.    diskchange Rad:
  23.    if warn
  24.       ask "Not enough memory for RAD:, use slow installation method?(Y/N)"
  25.       if warn
  26.          skip ins
  27.       else
  28.          skip MOUNT1 back
  29.       endif
  30.    endif
  31.    echo "If you are using RAD in memory, its contents will be erased."
  32.    ask "OK to erase? Press Y if unsure.(Y/N)"
  33.    if not warn
  34.       skip ins
  35.    endif
  36.    COPY "PRO-NET_P:Ins1" to ram:
  37.    COPY "PRO-NET_P:MERGELIB" to ram:
  38.    ECHO "CD RAM:"
  39.    CD RAM:
  40.    EXECUTE ram:Ins1 <NAME>
  41.    skip L_Done
  42. endif
  43. lab ins
  44. COPY "PRO-NET_P:Ins"  to ram:
  45. COPY "PRO-NET_P:MERGELIB" to ram:
  46. ECHO "CD RAM:"
  47. CD RAM:
  48. EXECUTE ram:Ins <NAME>
  49. LAB L_Done
  50. ECHO "Please insert PRO-NET in df0:"
  51. ECHO "Are you ready (Y/N)?"
  52. if warn
  53. CD DF0:
  54. endif
  55. ECHO " "
  56. CD
  57. lab exit1
  58. QUIT
  59.  
  60.  
  61.